home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Personal Computer World 2007 September
/
PCWSEP07.iso
/
Software
/
Shareware
/
xStarter 1.8.8
/
setup.exe
/
{app}
/
xStartUI.exe
/
0
/
RCDATA
/
TTRANSFERFORM
/
TTRANSFERFORM.txt
< prev
Wrap
Text File
|
2007-06-06
|
14KB
|
515 lines
object TransferForm: TTransferForm
Left = 375
Top = 258
Caption = 'Tasks uploads/downloads'
ClientHeight = 422
ClientWidth = 574
Color = clBtnFace
Constraints.MinHeight = 451
Constraints.MinWidth = 582
ParentFont = True
KeyPreview = True
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 0
Top = 378
Width = 574
Height = 3
Align = alBottom
Shape = bsBottomLine
end
object Panel1: TPanel
Left = 0
Top = 381
Width = 574
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
DesignSize = (
574
41)
object btOk: TElPopupButton
Left = 456
Top = 8
Width = 105
Height = 25
DrawDefaultFrame = False
Caption = 'OK'
TabOrder = 0
OnClick = btOkClick
Anchors = [akRight, akBottom]
end
object btHelp: TElPopupButton
Left = 8
Top = 8
Width = 113
Height = 25
ImageIndex = 14
UseImageList = True
Images = TrayForm.ilMain
DrawDefaultFrame = False
Caption = 'Help'
TabOrder = 1
Visible = False
Anchors = [akLeft, akBottom]
end
end
object Panel2: TPanel
Left = 0
Top = 0
Width = 574
Height = 43
Align = alTop
BevelOuter = bvNone
TabOrder = 1
DesignSize = (
574
43)
object lbHelp: TLabel
Left = 40
Top = 5
Width = 521
Height = 33
Anchors = [akLeft, akTop, akRight]
AutoSize = False
Caption =
'It'#39's possible here to connect to remote computers with installed' +
' xStarter Web Pilot program and Upload / Download tasks.'
WordWrap = True
end
object Image1: TImage
Left = 8
Top = 8
Width = 25
Height = 25
Picture.Data = {<image000.bmp>}
Transparent = True
end
end
object ElSplitter1: TElSplitter
Left = 185
Top = 43
Width = 5
Height = 335
MinSizeTopLeft = 100
MinSizeBottomRight = 200
ControlTopLeft = Panel3
ControlBottomRight = Panel4
Align = alLeft
end
object Panel3: TPanel
Left = 0
Top = 43
Width = 185
Height = 335
Align = alLeft
BevelOuter = bvNone
TabOrder = 3
object VSTConn: TVirtualStringTree
Left = 27
Top = 0
Width = 158
Height = 335
Align = alClient
BevelInner = bvNone
BevelKind = bkTile
BorderStyle = bsNone
Header.AutoSizeIndex = -1
Header.Font.Charset = DEFAULT_CHARSET
Header.Font.Color = clWindowText
Header.Font.Height = -11
Header.Font.Name = 'MS Sans Serif'
Header.Font.Style = []
Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowHint, hoVisible]
Header.ParentFont = True
Header.Style = hsFlatButtons
HintAnimation = hatNone
HintMode = hmTooltip
ParentShowHint = False
PopupMenu = TBPopupMenu1
ShowHint = True
TabOrder = 0
TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoSort, toAutoSpanColumns, toAutoTristateTracking, toAutoHideButtons]
TreeOptions.MiscOptions = [toAcceptOLEDrop, toFullRepaintOnResize, toInitOnSave, toWheelPanning]
TreeOptions.PaintOptions = [toPopupMode, toShowButtons, toShowDropmark, toShowTreeLines, toShowVertGridLines, toThemeAware, toUseBlendedImages]
TreeOptions.SelectionOptions = [toMiddleClickSelect, toRightClickSelect]
OnCompareNodes = VSTConnCompareNodes
OnDblClick = VSTConnDblClick
OnDragAllowed = VSTConnDragAllowed
OnDragOver = VSTConnDragOver
OnDragDrop = VSTConnDragDrop
OnFocusChanged = VSTConnFocusChanged
OnGetText = VSTConnGetText
OnGetImageIndex = VSTConnGetImageIndex
Columns = <
item
Position = 0
Width = 156
WideText = 'Web Connections'
end>
end
object TBDock3: TSpTBXDock
Left = 0
Top = 0
Width = 27
Height = 335
Position = dpLeft
object ToolbarConn: TSpTBXToolbar
Left = 0
Top = 0
Caption = 'ToolbarRole'
DockMode = dmCannotFloatOrChangeDocks
Images = TrayForm.ilMain
ParentShowHint = False
ShowHint = True
TabOrder = 0
object tiAddConnection: TSpTBXItem
Caption = 'Add Connection'
Hint = 'Add Connection'
Action = acAddConnection
end
object tiEditConnection: TSpTBXItem
Caption = 'Edit Connection'
Hint = 'Edit Connection'
Action = acEditConnection
end
object tiDeleteConnection: TSpTBXItem
Caption = 'Delete Connection'
Hint = 'Delete Connection'
Action = acDeleteConnection
end
object TBSeparatorItem1: TSpTBXSeparatorItem
end
object TBItem1: TSpTBXItem
Caption = 'Connect'
Hint = 'Connect'
Action = acConnect
end
object TBItem8: TSpTBXItem
Caption = 'Disconnect'
Hint = 'Disconnect'
Action = acDisconnect
end
end
end
end
object Panel4: TPanel
Left = 190
Top = 43
Width = 384
Height = 335
Align = alClient
BevelOuter = bvNone
TabOrder = 4
object VSTLocal: TVirtualStringTree
Left = 0
Top = 0
Width = 384
Height = 152
Align = alClient
BevelInner = bvNone
BevelKind = bkTile
BorderStyle = bsNone
Header.AutoSizeIndex = 1
Header.Font.Charset = DEFAULT_CHARSET
Header.Font.Color = clWindowText
Header.Font.Height = -11
Header.Font.Name = 'MS Sans Serif'
Header.Font.Style = []
Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowHint, hoVisible]
Header.ParentFont = True
Header.Style = hsFlatButtons
HintAnimation = hatNone
HintMode = hmHint
Images = TrayForm.ilMain
ParentShowHint = False
PopupMenu = TBPopupMenu2
ShowHint = True
TabOrder = 0
TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoSpanColumns, toAutoTristateTracking, toAutoHideButtons, toAutoDeleteMovedNodes]
TreeOptions.PaintOptions = [toPopupMode, toShowButtons, toShowDropmark, toShowRoot, toShowTreeLines, toShowVertGridLines, toThemeAware, toUseBlendedImages]
TreeOptions.SelectionOptions = [toMiddleClickSelect, toRightClickSelect]
OnDragAllowed = VSTLocalDragAllowed
OnDragOver = VSTLocalDragOver
OnDragDrop = VSTLocalDragDrop
OnGetText = VSTGetText
OnGetImageIndex = VSTGetImageIndex
Columns = <
item
Position = 0
Width = 150
WideText = 'Local Sections / Tasks'
end
item
Position = 1
Width = 232
WideText = 'Description'
end>
end
object ElSplitter2: TElSplitter
Left = 0
Top = 152
Width = 384
Height = 5
Cursor = crVSplit
MinSizeTopLeft = 100
MinSizeBottomRight = 100
ControlTopLeft = VSTLocal
ControlBottomRight = Panel5
Align = alBottom
end
object Panel5: TPanel
Left = 0
Top = 157
Width = 384
Height = 178
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
object VST: TVirtualStringTree
Left = 0
Top = 26
Width = 384
Height = 152
Align = alClient
BevelInner = bvNone
BevelKind = bkTile
BorderStyle = bsNone
Header.AutoSizeIndex = 1
Header.Font.Charset = DEFAULT_CHARSET
Header.Font.Color = clWindowText
Header.Font.Height = -11
Header.Font.Name = 'MS Sans Serif'
Header.Font.Style = []
Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowHint, hoVisible]
Header.ParentFont = True
Header.Style = hsFlatButtons
HintAnimation = hatNone
HintMode = hmHint
Images = TrayForm.ilMain
ParentShowHint = False
PopupMenu = TBPopupMenu3
ShowHint = True
TabOrder = 0
TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoSpanColumns, toAutoTristateTracking, toAutoHideButtons, toAutoDeleteMovedNodes]
TreeOptions.PaintOptions = [toPopupMode, toShowButtons, toShowDropmark, toShowRoot, toShowTreeLines, toShowVertGridLines, toThemeAware, toUseBlendedImages]
OnDragAllowed = VSTLocalDragAllowed
OnDragOver = VSTLocalDragOver
OnDragDrop = VSTLocalDragDrop
OnGetText = VSTGetText
OnGetImageIndex = VSTGetImageIndex
Columns = <
item
Position = 0
Width = 150
WideText = 'Remote Sections / Tasks'
end
item
Position = 1
Width = 232
WideText = 'Description'
end>
end
object TBDock1: TSpTBXDock
Left = 0
Top = 0
Width = 384
Height = 26
object TBToolbar2: TSpTBXToolbar
Left = 108
Top = 0
Caption = 'ToolbarRole'
DockMode = dmCannotFloatOrChangeDocks
ParentShowHint = False
ShowHint = True
TabOrder = 0
Visible = False
object itVersion: TSpTBXItem
Caption = 'Remote version:'
Enabled = False
end
end
object TBToolbar1: TSpTBXToolbar
Left = 0
Top = 0
Caption = 'ToolbarRole'
DockMode = dmCannotFloatOrChangeDocks
Images = TrayForm.ilMain
ParentShowHint = False
ShowHint = True
TabOrder = 1
object TBItem11: TSpTBXItem
Caption = 'Upload'
Hint = 'Upload'
Action = acUpload
end
object TBItem13: TSpTBXItem
Caption = 'Download'
Hint = 'Download'
Action = acDownload
end
object TBItem6: TSpTBXItem
Caption = 'Create new remote section'
Hint = 'Create new remote section'
Action = acNewSection
end
object TBSeparatorItem4: TSpTBXSeparatorItem
end
object TBItem14: TSpTBXItem
Caption = 'Refresh Remote Tasks'
Hint = 'Refresh Remote Tasks'
Action = acRefresh
end
end
end
end
end
object ElFormPersist1: TElFormPersist
Storage = TrayForm.ElIniFile1
PersistOptions = [epoState, epoPosition, epoProperties, epoSize]
TopMost = False
Left = 144
Top = 160
PropsToStore = {
010000000100000000000600000050616E656C35000000000101060000004865
69676874}
end
object ActionList1: TActionList
Images = TrayForm.ilMain
Left = 80
Top = 96
object acAddConnection: TAction
Caption = 'Add Connection'
Hint = 'Add Connection'
ImageIndex = 0
OnExecute = acAddConnectionExecute
end
object acEditConnection: TAction
Caption = 'Edit Connection'
Hint = 'Edit Connection'
ImageIndex = 16
OnExecute = acEditConnectionExecute
end
object acDeleteConnection: TAction
Caption = 'Delete Connection'
Hint = 'Delete Connection'
ImageIndex = 6
OnExecute = acDeleteConnectionExecute
end
object acConnect: TAction
Caption = 'Connect'
Hint = 'Connect'
ImageIndex = 25
OnExecute = acConnectExecute
end
object acUpload: TAction
Caption = 'Upload'
Hint = 'Upload'
ImageIndex = 9
OnExecute = acUploadExecute
end
object acDownload: TAction
Caption = 'Download'
Hint = 'Download'
ImageIndex = 10
OnExecute = acDownloadExecute
end
object acRefresh: TAction
Caption = 'Refresh Remote Tasks'
Hint = 'Refresh Remote Tasks'
ImageIndex = 26
OnExecute = acConnectExecute
end
object acDisconnect: TAction
Caption = 'Disconnect'
Hint = 'Disconnect'
ImageIndex = 27
OnExecute = acDisconnectExecute
end
object acNewSection: TAction
Caption = 'Create new remote section'
Hint = 'Create new remote section'
ImageIndex = 1
OnExecute = acNewSectionExecute
end
end
object TBPopupMenu1: TSpTBXPopupMenu
Left = 112
Top = 160
object TBItem4: TSpTBXItem
Caption = 'Add Connection'
Hint = 'Add Connection'
Action = acAddConnection
end
object TBItem3: TSpTBXItem
Caption = 'Edit Connection'
Hint = 'Edit Connection'
Action = acEditConnection
end
object TBItem2: TSpTBXItem
Caption = 'Delete Connection'
Hint = 'Delete Connection'
Action = acDeleteConnection
end
object TBSeparatorItem2: TSpTBXSeparatorItem
end
object TBItem5: TSpTBXItem
Caption = 'Connect'
Hint = 'Connect'
Action = acConnect
Options = [tboDefault]
end
object TBItem10: TSpTBXItem
Caption = 'Disconnect'
Hint = 'Disconnect'
Action = acDisconnect
end
end
object TBPopupMenu2: TSpTBXPopupMenu
Left = 224
Top = 96
object TBItem12: TSpTBXItem
Caption = 'Upload'
Hint = 'Upload'
Action = acUpload
end
end
object TBPopupMenu3: TSpTBXPopupMenu
Left = 224
Top = 264
object TBItem15: TSpTBXItem
Caption = 'Download'
Hint = 'Download'
Action = acDownload
end
object TBSeparatorItem5: TSpTBXSeparatorItem
end
object TBItem16: TSpTBXItem
Caption = 'Refresh Remote Tasks'
Hint = 'Refresh Remote Tasks'
Action = acRefresh
end
end
object inp: TElInputDialog
StyleManager = MainForm.ElStyleManager1
IsHTML = False
Position = poMainFormCenter
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Left = 80
Top = 160
end
end